;==========================================;
;	SPC Generator
;==========================================;

#SPC
{
	#title "Jewel On The Dance Floor" ; ~ Jewel Temptation (SNES Remix)
	#game "Rockman 2+7"
	#author "Hiroki Isogai"
	#comment "arr. Hooded Edge"
	#length "auto"
}

;==========================================;
;	THIS RIGHT HERE IS DEFINITELY IMPORTANT!!
;==========================================;

;	To change the pitch of the song, replace the number after
;	"PITCH" to any number between whatever's included below.
;	This won't affect the percussion / sfx by this at all.

;	To change the VOICE of the song, replace the number after
;	"VOICE" to any number between whatever's included below.
;	This'll affect whether the voice clips appears in the song, 
;	but it will disable both the Thunder, P-Switch, & Yoshi sound effects in-game.

;	This allows for awesome customization to fit your needs or your
;	preferences... but if you know your stuff, then you should be able
;	to go way beyond the limits I gave you here.

;==========================================;
;	Song Pitch
;==========================================;

	#define PITCH 1 ; Choose between 1 - 2
	#define VOICE 2 ; Choose between 1 - 2

;=================| Pitch |===================;

;	1	= Pitch will be on the e minor (Original)
;	2	= Pitch will be on the d# minor (Custom)

;=================| Voice |==================;

;	1	=	Enables the voice clip, but disables Thunder, P-Switch, & Yoshi (Voice Enabled)
;	2	=	Disables the voice clip (Voice Disabled)

;==========================================;
;	Samples
;==========================================;

#path "JEWEL-MAN"

;==========================================;

#if VOICE == 1
#SAMPLES
{
	"../optimized/00 SMW @0.brr"
	"../optimized/01 SMW @1.brr"
	"../optimized/02 SMW @2.brr"
	"../optimized/03 SMW @3.brr"
	"../optimized/04 SMW @4.brr"
	"../optimized/05 SMW @8.brr"
	"../optimized/06 SMW @22.brr"
	"../optimized/07 SMW @5.brr"
	"../default/08 SMW @6.brr"
	"../EMPTY.brr"
	"../optimized/0A SMW @9.brr"
	"../optimized/0B SMW @10.brr"
	"../optimized/0C SMW @13.brr"
	"../optimized/0D SMW @14.brr"
	"../optimized/0E SMW @29.brr"
	"../optimized/0F SMW @21.brr"
	"../EMPTY.brr"
	"../optimized/11 SMW @17.brr"
	"../EMPTY.brr"
	"../EMPTY.brr"
}
#endif


#if VOICE == 2
#SAMPLES
{
	"../optimized/00 SMW @0.brr"
	"../optimized/01 SMW @1.brr"
	"../optimized/02 SMW @2.brr"
	"../optimized/03 SMW @3.brr"
	"../optimized/04 SMW @4.brr"
	"../optimized/05 SMW @8.brr"
	"../optimized/06 SMW @22.brr"
	"../optimized/07 SMW @5.brr"
	"../default/08 SMW @6.brr"
	"../EMPTY.brr"
	"../optimized/0A SMW @9.brr"
	"../optimized/0B SMW @10.brr"
	"../optimized/0C SMW @13.brr"
	"../optimized/0D SMW @14.brr"
	"../optimized/0E SMW @29.brr"
	"../optimized/0F SMW @21.brr"
	"../optimized/10 SMW @12.brr"
	"../optimized/11 SMW @17.brr"
	"../optimized/12 SMW @15.brr"
	"../optimized/13 SMW Thunder.brr"
}
#endif

#SAMPLES
{
	"Aquarius Lead.brr"
	"Roger Rabbit Pulse.brr"
	"MM7 Sawtooth.brr"
	"FF5 Perc Organ.brr"

	"MM7 Elec Piano.brr"
	"MMX1 String Ens.brr"
	"S3 Slap Bass II.brr"

	"Yasui Snare.brr"
	"DNB Bass Drum.brr"
	"S-550 LA Tom.brr"
	"TR-909 Hi-Hat.brr"
	"TR-909 Hi-Hat.brr"
	"R-8 Crash Cym.brr"
}

;==========================================;
;	Instruments
;==========================================;

#INSTRUMENTS
{
	"Yasui Snare.brr" $9F $F4 $B8 $15 $40 ; @30 snare
	"DNB Bass Drum.brr" $FF $F4 $B8 $07 $F0 ; @31 bass drum
	"S-550 LA Tom.brr" $FF $F4 $B8 $09 $00 ; @32 tom
	"TR-909 Hi-Hat.brr" $FF $FC $B8 $0A $40 ; @33 closed hi-hat
	"TR-909 Hi-Hat.brr" $FF $F5 $B8 $0A $80 ; @34 open hi-hat
	"R-8 Crash Cym.brr" $9F $F2 $B8 $0A $00 ; @35 crash cymbal (c+1)
	"R-8 Crash Cym.brr" $9F $F3 $B8 $0A $00 ; @36 crash cymbal (c+4)

	"Aquarius Lead.brr" $BF $B4 $B8 $03 $00 ; @37 synth
	@6 $FF $E6 $B8 $03 $00 ; @38 lead
	"Roger Rabbit Pulse.brr" $FF $A6 $B8 $06 $00 ; @39 pulse
	"MM7 Sawtooth.brr" $FF $A6 $B8 $04 $01 ; @40 mm7 saw
	"FF5 Perc Organ.brr" $FF $A6 $B8 $04 $7F ; @41 perc. organs

	"Aquarius Lead.brr" $BF $A8 $B8 $03 $01 ; @43 bg synth
	"MM7 Elec Piano.brr" $CF $A8 $B8 $04 $01 ; @44 elec. piano
	"MMX1 String Ens.brr" $FB $E0 $B8 $03 $00 ; @45 chord
	"S3 Slap Bass II.brr" $9F $AC $B8 $05 $C0 ; @46 slap bass
}

;==========================================;
;	Main Macros
;==========================================;

	"@e = $F4 $03"
	"%l = $F4 $01"

	"($EE-X) = $EE $00"
	"($FA-3X) = $FA $03 $00"
	"$XR-X = $FA $02 $00"
		"$XR- = $FA $02 $"
	"($E8-X) = $E8 $00 $00"
		"($E8-0) = $E8 $FF $1A" ; fade out
	"($EC-X) = $EC $00 $00 $00"
		"($EC-0) = $EC $00 $04 $02"
	"($DC-X) = $DC $00 $00"
	"(6T = (69"

	"@rest = r2 /"

	"@end = [ r2 ]20"

;==========================================;
;	Note Commands
;==========================================;

	"_ = q75 y10 c q7F y9"

	"u = < @p c ($FA-3X) >"
	"u16 = < @p c16 ($FA-3X) >"
	"u8 = < @p c8 ($FA-3X) >"

	"n+ = ($FA-3X) b+ @p"
		"n+ n+ = ($FA-3X) b+ b+ @p"
	"n+16 = ($FA-3X) b+16 @p"
		"n+16 n+16 = ($FA-3X) b+16 b+16 @p"
		"n+16 @open n+ = ($FA-3X) b+16 @open b+ @p"
	"n+8 = ($FA-3X) b+8 @p"
		"n+8 n+8 = ($FA-3X) b+8 b+8 @p"
	"n+4 = ($FA-3X) b+4 @p"
		"n+4 n+4 = ($FA-3X) b+4 b+4 @p"
	
	"k = @e c+ ($FA-3X) @e"
	"k8 = @e c+8 ($FA-3X) @e"
		"k8^ = @e c+8^ ($FA-3X) @e"
		"k8^32 = @e c+8^32 ($FA-3X) @e"
		"k8. = @e c+8. ($FA-3X) @e"
			"k8. k8. @crash- k4. = @e c+8. c+8. @crash- c+4. ($FA-3X) @e"
	"k4 = @e c+4 ($FA-3X) @e"
		"-k4 = c+4 ($FA-3X) @e"
		"k4^ = @e c+4^ ($FA-3X) @e"
		"k4^16 = @e c+4^16 ($FA-3X) @e"
			"k4^16. = @e c+4^16. ($FA-3X) @e "
		"k4. = @e c+4. ($FA-3X) @e"
	"k2 = @e c+2 ($FA-3X) @e"
		"k2. = @e c+2. ($FA-3X) @e"
		"k2^16 = @e c+2^16 ($FA-3X) @e"
	"k1 = @e c+1 ($FA-3X) @e"
		"k1. = @e c+1. ($FA-3X) @e"
	
	"kx = c+ ($FA-3X)"
	"kx8 = c+8 ($FA-3X)"
		"kx8^ = c+8^ ($FA-3X)"
		"kx8^32 = c+8^32 ($FA-3X)"
		"kx8. = c+8. ($FA-3X)"
	"kx4 = c+4 ($FA-3X)"
		"kx4^ = c+4^ ($FA-3X)"
		"kx4^32 = c+4^32 ($FA-3X)"
		"kx4^16 = c+4^16 ($FA-3X)"
			"kx4^16. = c+4^16. ($FA-3X)"
		"kx4. = c+4. ($FA-3X)"
		"kx4.. = c+4.. ($FA-3X)"
	"kx2 = c+2 ($FA-3X)"
		"kx2. = c+2. ($FA-3X)"
	"kx1 = c+1 ($FA-3X)"
		"kx1. = c+1. ($FA-3X)"

;==========================================;
;	Remote Commands
;==========================================;

	(!800)[ $F4 $09 ]
	(!810)[ $ED $7F $F8 ]
	(!820)[ $ED $7F $F7 ]

	"@cmd_main = (!800, -1) (!810, 3)"
	"@cmd_chd = (!800, -1) (!820, 3)"
	
	"@cmd_main_off = (!800, 0) (!810, 0)"
	"@cmd_chd_off = (!800, 0) (!820, 0)"

;==========================================;
;	Instrument Macros
;==========================================;

		"(F00) = $ED $7F $F4 ^8"
		"(F10) = $ED $7F $F2 ^4"
		"(F20) = $ED $7F $F1 ^2"
		"(F30) = $ED $7F $EF ^1"

	"@synth = @37 v200 | $DE $14 $07 $3A"
	"@lead = @38 v255 | $DE $16 $0A $34 | $FA $03 $24"
		"(V10) = v175"
	"@pulse = @39 v255 | $DE $16 $0A $34 | $FA $03 $3F"
	"@mm7saw = @40 v240 | $DE $16 $0A $2F"
		"(V00) = v175"
	"@porgans = @41 v255 | $DE $16 $0A $2F"

	"@BGsynth = @42 v178 | $DF"
	"@epiano = @43 v205 | $DE $10 $0A $1F"
	"@strchd = @44 v190 | $DE $10 $0A $1F"
	"@slapbass = @45 o3 v218"

;==========================================;
;	Percussion Macros
;==========================================;

	"@p = $FA $03 $42"

	"@snare = @30 v255 y10"
	"@kick = @31 v210 y10"
	"@tom = @32 v255"

	"@closed = @33 v180 y9"
	"@open = @34 v180 y10"
	"@crash = v255 y10 | $FA $03 $DF"
		"@crash+ = @35 | @crash"
		"@crash- = @36 | @crash"

;==========================================;
;	Echo Values
;==========================================;

	$EF $BC $38 $C7 ; OFF - #0, #1, #6
	$F1 $06 $A0 $01
	$F4 $02

;==========================================;
;	Corroscope
;==========================================;

; #0 t60

; #0 [ @0 c1 r1 ] /
; #1 * /
; #2 @e * @e /
; #3 @e * @e /
; #4 @e * @e /
; #5 @e * @e /
; #6 * /
; #7 @e * @e /

;==========================================;
;	DON'T MESS WITH THIS
;	IF YOU DON'T KNOW WHAT YOU'RE DOING!!!
;==========================================;

#if PITCH == 1 ; Original
;	$E4 $00 ; e minor
	"@rock = $DF"
	"@jewel = "
#endif

#if PITCH == 2 ; Custom
	$E4 $FF ; d# minor
	"@rock = h1 | $DF"
	"@jewel = h0"
#endif

;==========================================;
;==========================================;

#if VOICE == 1

#SAMPLES
{
	"MJ Scream.brr"
	"MJ Come On.brr"
}

#INSTRUMENTS
{
	"MJ Come On.brr" $00 $00 $7F $05 $F0 ; @46 mj scream
	"MJ Scream.brr" $00 $00 $7F $06 $00 ; @47 mj scream
}

	"@cmon = @46 o3 v255 y10 | $FA $03 $ED | f+8"
	"@scream = @47 o3 v255 y10 | $FA $03 $CF | e4 ($FA-3X)"

#endif

#if VOICE == 2
	"@cmon = r8"
	"@scream = r4"
#endif

;==========================================;
;	Extras
;==========================================;

	"CHANNEL # = #"

;==========================================;
;	Global Volume / Tempo
;==========================================;
	w110
	t49
;==========================================;

;==========================================;
	CHANNEL #0 | @rock @p
;==========================================;

@kick o3 | l8
c r c16 @snare c32 c32 c16 c16 / @kick

c @closed n+16 n+16 @kick [[ c r ]]13 c16 @snare c16 c c16 c @snare c16 @kick 
c @closed n+16 n+16 @snare c. @kick c16 c r @snare c4 @kick 
c r @snare c. @kick c16 c r @snare c16 c c16 @kick 
c r @snare c. @kick c16 c r @snare c4 @kick 
c r16 c r16 @snare c4 @kick c32 c32 c16 @snare c16 c c16 @kick 

c @closed n+16 n+16 @kick c r16 c16 
[[ [ c r ]3 c r16 c16 ]]3
c16 @snare c16 c c16 c @snare c16 @kick 

(015)[ c @closed n+16 n+16 @snare c. @kick c r c16 @snare c4 @kick ]
(010)[ c r @snare c. @kick c16 c r @snare ] c. c16 @kick 
(011)[ c r @snare c. @kick c r c16 @snare c4 @kick ] (010) c16 c c16 @kick 
(015) (010) c. c16 @kick 
(011) (010) c. c16 @kick 

c @closed n+16 n+16 @snare c. @kick c 
r c16 @snare c4 @kick c r @snare c. @kick c16 
c r16 c16 @snare c. c16 @kick c r @snare c. @kick c 
r. @snare c4 @kick [[ c r16 ]]4 @snare c32 c32 c16 c16 c16 @kick 

(020)[ c16 @closed n+16 @open n+ @snare c. @kick c16 @closed n+16 @kick c16 @open n+ @snare ] c4 @kick 
(021)[ c16 @closed n+16 @snare c c. @kick c c r16 @snare ] c c16 c16 @kick 
(020) c c16 c16 @kick (021) c16 c c16 @kick 
(020) c4 @kick (021) c c16 c16 @kick 
(020) c c16 c16 c4.. @kick c c c16 @snare c c16 c16 @kick 

c16 @closed n+16 (030)[ @snare c @kick c16 c16 @snare c16 @kick 
c c16 @snare c @kick c16 ] c16 @snare c16 c16 @kick 
c (030) @snare c c16 @kick 
c16 @closed n+16 (030) c16 @snare c16 c16 @kick 
c (030) @snare c16 c32 c32 c16 @kick 
c16 @closed n+16 (030) c16 @snare c16 c16 @kick 
c (030) @snare c16 c32 c32 c16 

c. c. @kick c16 c16 @snare c. c c16 c32 c32 c16 c. c. c. @kick 
c16 c16 c16 @snare c16 c16 c32 c32 c16

;==========================================;
	CHANNEL #6 | @e r4.
;==========================================;

@rock
@cmon / ^4 @e r1^1^1..

o4 | l16
@crash- k4 @kick u @closed c _ @open c @closed
(603)[ c c _ c @kick u @closed c @open c8 @closed ]
(601)[ c _ c c @kick u @closed c _ @open c @closed ] (604)[ c c _ c @kick u @open c @closed c @open c @closed ]
(601) (603) c8 c c8 c @open c4. @closed c @open c @closed c @open c 

(605)[ @crash- k4 @closed c c _ @open c @closed c c _ c c c @open c8 @closed ]
(600)[ c _ c c c c _ @open c @closed c c _ ] (602)[ c c @open c @closed c @open c @closed ]
(600) c c c @open c8 @closed 
(600) c @kick u @tom y11 a8 y9 f+ 

(606)[ @crash- k4 @kick u @closed c _ @open c @closed ] (603) (601) (604)
(601) (603) (601) c c _ c @kick u @tom y9 a32 a32 y11 f+ y7 d+ 
(606) (603) (601) (604)
(601) (603) (601) c c _ c @kick u @tom y9 a8 y11 f+ 
(606) (603) (601) (604)
(601) (603) c _ c c _ c c _ c c _ c @kick u @tom y11 a y9 f+32 f+32 y7 d+ 

(620)[ @crash- k4 @kick u @closed c @open c @crash- k4^ @kick u @closed c @open c @closed c ]
(621)[  @crash- k4 @kick u @closed c @open c8 @closed c c @open c8 @kick u @closed ] c @open c @closed c 
(620) (621) @tom y11 a8 y9 f+ 
(620) (621) c @open c @closed c 
(620) @crash+ k2^ @tom y7 b+32 b+32 b+ y8 b+ a y9 a y11 f+ y13 f+ 

@crash- k4 @closed (630)[ c c @open c8 @closed ]7
@crash- k4 @closed (630)6 c c @tom y9 a y11 f+
@crash- k4 @closed (630)7

@crash+ k2^ (6T0)[ @tom y13 b+32 b+32 b+ y12 b+ a y11 a y9 f+ y7 f+ ]
@crash+ k8. k8. @crash- k4. @closed c _ @open c=23 @e ^=1

;==========================================;
	CHANNEL #1 | @rock
;==========================================;

o4 | l16
r (6T0) @jewel /

@slapbass y10
(100)[ e8 q77 e q7F e > d e < a e8 > e q77 e q7F < e > d e q77 e q7F e <
a8 q77 a q7F ] (101)[ a > g a e c-8 b q77 b q7F c- a b q77 b q7F g < ]
(100) a > g a e c- b c- q77 c- q7F c- e32 e32 b > e < g <
(100) (101) (100) a8 q77 a q7F b8 q77 b q74 b q71 b q7F r4^

[[ (100) (101) (100) a > g a e c- b c- q77 c- q7F c- e32 e32 b > e < g < ]]3
(100) (101) (100) q7F b8 q77 b q7F > d8 q77 d q7F e8 q77 e q7F f+8 e8 

[[ (120)[ c8 c8 c8 c d8 d d8 d8 d8
e8 q77 e q74 e ] q7F e c- d e8 q77 e q7F d e g e q77 e q7F d ]]3

(120) q71 e q7F r8 d8 e q77 e q7F e g e8 d

(130)[ c8 c c c8 c d8 d d d d8 d d 
e8 ] (131)[ e e e8 d c-8 d e d8 e g e ]
(130) b e8 e a e8 e b e8 a f+ d 
(130) (131)

c8. c q77 c q7F c b+ g d8. d q77 d q7F d > d < g
e8. e8. e8 q77 e q74 e q71 e q7F r < a b a f+

;==========================================;
	CHANNEL #2 | @rest @rock
;==========================================;

o4 | @e | l16
(605) (600) (602)
(600) c c c @open c8 @closed (600) @kick u u @open c @closed c @open c 

@synth o4 y9 | @e | @jewel | l8
(200)[ e d e d16 e e16 d e ] d < b+ a > c c16 d d d16 c- d 
(200) f+ g. g. a4 r8

@rock
@scream @jewel

@lead o4 y9 | l16
(210)[ e8. q78 e q7F c- d q78 d q7F e q78 e q7F d q78 d q7F e q78 e q7F d q78 d q7F c 
< b8. q78 b q7F g a q78 a q7F > ] c- q78 c- q7F d q78 d q7F e q78 e q7F d q78 d q7F d 
(211)[ e8. q78 e q7F c- d q78 d q7F e q78 e q7F f+ q78 f+ q7F g q78 g q7F e g a 
a+8. a+32 b32 a+ a g a8 g e g8 g > e c- < ]
(212)[ g8. q78 g q7F d f+ q78 f+ q7F g q78 g q7F ] (213)[ f+ q78 f+ q7F g q78 g q7F f+ q78 f+ q7F e 
e8. q78 e q7F c- d q78 d q7F e q78 e q7F ] f+ q78 f+ q7F g q78 g q7F f+ q78 f+ q7F f+ 
g8. q78 g q7F d f+ q78 f+ q7F g q78 g q7F a q78 a q7F b q78 b q7F g b > d 
e8. c- q78 c- q7F c- e f+ g q78 g q7F e f+ q78 f+ q7F e d e <

@pulse
(210) < a+ q78 a+ q7F b q78 b q7F > d q78 d q7F c- q78 c- q7F c-
(211) (212) (213) d q78 d q7F e q78 e q7F f+ q78 f+ q7F d 
q78 d q7F f+ q78 f+ q7F g8 d e f+ g q78 g q7F a b q78 b q7F a b > d 
e8 q78 e q7F f+8 q78 f+ q7F g8 q78 g q7F a8 q78 a q7F a8 b8 ($FA-3X)

(220)[ @lead o4
g4.. a2^ ($FA-3X)

@mm7saw ]
(221)[ a64 a+64 b. a g f+ e q78 e q7F g q78 g q7F a q78 a q7F g q78 g q7F d e8 ]

(220) (222)[ > c+64 d32. e q78 e q7F e8 q78 e q7F c- d q78 d q7F e ] c- d e8 q78 e q75 e q7F

(220) (221) (220) (222) q78 e q7F e g e8. < 

(230)[ @porgans o4
a+8 a g q78 g q7F e q78 e q7F g q78 g q7F a q78 a q7F ] > d c < b a b2 

@lead y10
a8 b > d c- d e g e < ($FA-3X)

@porgans y9
g8 e d q78 d q7F c- q78 c- q7F d q78 d q7F c- q78 c- q7F c- d e g e2 

@lead y10
> g8 e d e d < b a g ($FA-3X)

(230) a b a g b2 
a8 a q78 a q7F b8 > c d^64 %l c-64 c64 d=2 %l ^=1

e8 d e q78 e q7F b8 a q78 a q7F g f+ g f+ d q78 d 
< %l q7B a64 q7C b64 > q7D c64 q7E d=2 %l ^=1 q7F
e8 q78 e q7F d8. e8 (F00) r8

@rock
@scream

;==========================================;
	CHANNEL #3 | @rest
;==========================================;

r32 @epiano o3 y11 | @cmd_chd
(700)[ b1 a2 b2 
b1 b+2 ] b2 
(701)[ b1 a2 b2 
b2.... ] > c8 r16 c8 r16 d8 r2 <
@cmd_chd_off

@BGsynth o3 y11 | l16
q7F (310)[ e q78 e q7F > d e q78 e q7F c- q78 c- q7F d q78 d q7F < g q78 g q7F a q78 a q7F g e d 
c ] (311)[ q78 c q7F a b+ q78 b+ q7F g a b+ d q78 d q7F b > d q78 d q7F < a b > d < ]
(310) (312)[ a q78 a q7F b+ q78 b+ q7F g a b+ d b q78 b q7F > d q78 d q7F d f+ d < ]

@lead o4 y12
q7D (315)[ e8. q76 e q7D c- d q76 d q7D e q76 e q7D d q76 d q7D e q76 e q7D d q76 d q7D c 
< b8. q76 b q7D g a q76 a q7D b q76 b q7D > ] d q76 d q7D e q76 e q7D d q76 d q7D d 
e8. q76 e q7D c- d q76 d q7D e q76 e q7D f+ q76 f+ q7D g q76 g q7D e g a 
b8. g q76 g q7D g b > d e q76 e q7D c- d q76 d q7D c- c- c- < ($FA-3X)

@BGsynth y11
q7F (310) (311) (310) (312)

@pulse o3
q7D (315) a q76 a q7D b q76 b q7D > d q76 d q7D < a 
q76 a q7D > d q76 d q7D e8 c- c- d e q76 e q7D f+ g q76 g q7D f+ g a 
b8 q76 b q7D > d8 q76 d q7D e8 q76 e q7D e8 q76 e q7D f+8 g8 ($FA-3X) <

@lead
(320)[ y12 || q7D e4.. f+2^ q7F ($FA-3X) ]

r2.^ 

@lead y9
c- f+ a (320)

(321)[ @mm7saw
b b q76 b q7D b8 q76 b q7D g b q76 b q7D b ] g b b8 q76 b q73 b q7F

@lead
(320)

r2.^ 

@lead y9
q7F c- f+ a (320) (321) > q76 c- q7D c- d c-8. <

@porgans y12
(330)[ g8 f+ e q76 e q7D c- q76 c- q7D e q76 e q7D f+ q76 f+ q7D ] b a g f+ g2 

r16. @lead (V10) y10
a8 b > d c- d e32 < ($FA-3X)

@porgans y9
q7B %l e64 q7C f+64 q7D g64 q7E a=2 %l ^=1 q7D
y12
e8 < b b q76 b q7D g q76 g q7D b q76 b q7D g q76 g q7D g b b > e c-2 

r16. @lead (V10) y10
> g8 e d e d < b32 ($FA-3X)

@porgans y9
q7B %l e64 q7C f+64 q7D g64 q7E a=2 %l ^=1 q7D
y12
(330) f+ g f+ e g2 
f+8 f+ q76 f+ q7D g8 a b8 

> c-8 c- c- q76 c- q7D g8 f+ q76 f+ q7D e d e d < b q76 b %l q79 e64 q7A f+64 q7B g64 q7C a=2 %l ^=1 q7D
b8 q76 b q7D b8. b8 (F00) r4.

;==========================================;
	CHANNEL #4 | @cmd_chd @rest
;==========================================;

@epiano o4 y7 | l2
r16 (400)[ e1 c d 
e1 e ] d 
(401)[ e1 c d 
e... ] e8 r16 e8 r16 f+8 r 

r16 [[ (400) f+2 ]]3
(401) e4. f+4. a4 

(420)[ @lead y11
q7D c4.. d2^16 q7F

@epiano y7 ] | l16
(421)[ g r8 g r8 g r8 g r ] f+ r f+ f+ r 
(420) (421) g r g g r 
(420) (421) f+ r f+ f+ r 
l2
(420) g8 r.^16

@porgans o4 y9
q7B %l e64 q7C f+64 q7D g64 q7E a=2 %l ^=1 q7F

@strchd y7
e4.. f+^16 g. f+4 
e4.. d^16 e. d4 
e4.. f+4^16 a4 g. f+4 

l8
e. e16 r4 f+. f+16 r4 g r16 f+. g r2

;==========================================;
	CHANNEL #7 | @rest [[ r2 ]]12
;==========================================;

@synth o4 y12 | l8
q7D c- c- c- c-16 c- c-16 c- c- d
e. e. f+4 r4.

r32 @epiano y11 | @cmd_chd | l2
q7F [[ (700) d ]]3
(701) c4. d4. e16

@lead y9
c-16 f+16 a16

y13
(720)[ @strchd
c4.. d^16

@epiano | l16
e r8 e r8 e r8 e r d r ] d d r

(720)
@cmd_chd_off

@lead y9
c- f+ a

y13 | @cmd_chd
(720) d d r

@strchd | l2
c4.. d^16

@epiano
e8 r..

@strchd 
c4.. d^16 e. d4
c4.. c-1.^16
c4.. d4^16 e1 d4

l8
c. c16 r4 d. d16 r4 e r16 d. e r4
@cmd_chd_off

r4

;==========================================;
	CHANNEL #5 | @cmd_chd @rest
;==========================================;

@epiano o3 y13
(500)[ g1 e2 f+2 
g1 ] a2 f+2 
(500) a8 r16 a8 r16 b8 r2 

[[ (500) a2 b2 ]]3
(500) a4. b4. b+4

[[ @strchd
g4.. a2^16 

@epiano
b16 r8 b16 r8 b16 r8 b16 r16 b16 r16 b16 b16 r16 ]]3

@strchd
g4.. a2^16 

@epiano
b8 r2..

@strchd o3
a4.. b1.^16 
a4.. f+2^16 g1 
a4.. b1.^16 

l8
a. a16 r4 b. b16 r4 b r16 b. b r2

;==========================================;
;	MML by Hooded Edge
;==========================================;

#amk 2